=head1 BASE INFORMATION

=head2 Filename

Base.pm

=head2 Path

/lib/Controller/Default/

=head2 Notes

=head2 ToDo's

=head2 Revision

=over 4

=item *

$HeadURL: http://catwork.googlecode.com/svn/trunk/lib/catwork/Controller/Default/Core.pm $

=item * 

$Id: Core.pm 3 2011-03-21 17:56:59Z hg.winkler.77 $

=back

=head2 Header Source Code

=cut

package catwork::Controller::Default::Core;
use Moose;
use namespace::autoclean;

BEGIN {extends 'Catalyst::Controller'; }

=head1 NAME

catwork::Controller::Default::Base - Catalyst Controller

=head1 DESCRIPTION

Catalyst Controller.

=head1 METHODS

=cut


=head2 index

=head3 source code

=cut

sub index :Path :Args(0) {
    my ( $self, $c ) = @_;

    $c->response->body('Matched catwork::Controller::Default::Core in Default::Core.');
}


=head1 AUTHOR

Hans-Georg Winkler,,,

=head1 LICENSE

This library is free software. You can redistribute it and/or modify
it under the same terms as Perl itself.

=cut

__PACKAGE__->meta->make_immutable;

